(import modelo.*)
(deftemplate Movil (declare (from-class Movil)))

(defrule seleccionaWLan
    ?p <- (Movil {wlan <> TRUE})
    =>
    (retract ?p))